﻿<%@ Page Title="" Language="VB" MasterPageFile="~/Master/Site.master" %>

<script runat="server">
    Public Sub ActivateStep(ByVal sender As Object, ByVal e As System.EventArgs)
        ListBox1.DataSource = Roles.GetAllRoles()
        ListBox1.DataBind()
    End Sub
    
    Public Sub DeactivateStep(ByVal sender As Object, ByVal e As System.EventArgs)
        Roles.AddUserToRole(User.Identity.Name, ListBox1.SelectedValue)
    End Sub
</script>

<asp:Content ID="Content1" ContentPlaceHolderID="HeadContent" Runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="MainContent" Runat="Server">
<!-- #include file="_nav.aspx -->


<table class="webparts">
<tr>
	<th>Online Users</th>
</tr>
<tr>
<td class="details" valign="top">

<!-- #include file="_nav3.aspx -->

<br />
    <asp:CreateUserWizard ID="CreateUserWizard1" runat="server" 
        FinishDestinationPageUrl="~/Default.aspx">
        <WizardSteps>
            <asp:CreateUserWizardStep ID="CreateUserWizardStep1" runat="server">
            </asp:CreateUserWizardStep>
            <asp:WizardStep ID="WizardStep1" runat="server" Title="Choose your role" OnActivate="ActivateStep" OnDeactivate="DeactivateStep">
                Select a role:<br />
                <asp:ListBox ID="ListBox1" runat="server"></asp:ListBox>
            </asp:WizardStep>
            <asp:CompleteWizardStep ID="CompleteWizardStep1" runat="server">
            </asp:CompleteWizardStep>
        </WizardSteps>
    </asp:CreateUserWizard>
</asp:Content>

